home *** CD-ROM | disk | FTP | other *** search
/ Mac Format 2004 Junue - Disc 1 / MacFormat 143 CD1.iso / Serious Software / Geo3D 2.1.2 / Sample Scripts / Viewpoints < prev   
Text File  |  2003-05-27  |  572b  |  17 lines
  1. tell application "Geo3D"
  2.     activate
  3.     make new document
  4.     camera fromX -37.23 fromY 54.94 fromZ 100 toX 11.47 toY 25.21 toZ 38.31 upX -0.2382 upY 0.788 upZ -0.5677 FOV 22.0
  5.     add viewpoint named "Just a Viewpoint" -- item 1
  6.     left view -- menu Viewer/Camera
  7.     add viewpoint named "Left" -- item 2
  8.     top view -- menu Viewer/Camera
  9.     add viewpoint named "Top" -- item 3
  10.     show viewpoint item 1
  11.     next viewpoint -- item 2
  12.     next viewpoint -- item 3
  13.     previous viewpoint -- item 2
  14.     remove viewpoint item 3 -- remove "Top"
  15.     -- (item 0 = remove current item; item -1 = remove all)
  16. end tell
  17.